pairs Derived Type
type, private :: pairs
Components
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| real(kind=float), | public | :: | h |
pair distance |
|||
| integer(kind=short), | public | :: | p1 |
id of points pair |
|||
| integer(kind=short), | public | :: | p2 |
id of points pair |
|||
| real(kind=float), | public | :: | theta |
pair angle |
Source Code
TYPE pairs INTEGER (KIND = short) :: p1, p2 !!id of points pair REAL (KIND = float) :: h !! pair distance REAL (KIND = float) :: theta !!pair angle END TYPE pairs